home *** CD-ROM | disk | FTP | other *** search
/ Geek Games #12 / GEGA012.iso / Jogos de Azar / 3card_poker.swf / scripts / DefineSprite_166 / frame_14 / DoAction.as
Text File  |  2006-01-17  |  4KB  |  193 lines
  1. PlayerHand = "0";
  2. if(p3 >= "12" or p1 == "1")
  3. {
  4.    PlayerHand = "1";
  5. }
  6. if(p1 == p2)
  7. {
  8.    ppair = p1;
  9.    PlayerHand = "2";
  10. }
  11. if(p1 == p3)
  12. {
  13.    ppair = p1;
  14.    PlayerHand = "2";
  15. }
  16. if(p2 == p3)
  17. {
  18.    ppair = p2;
  19.    PlayerHand = "2";
  20. }
  21. if(z1 == z2 and z1 == z3)
  22. {
  23.    PlayerHand = "3";
  24. }
  25. if(p1 + "1" == p2 and p1 + "2" == p3 or p1 == "1" and p2 == "12" and p3 == "13")
  26. {
  27.    PlayerHand = "4";
  28. }
  29. if(p1 == p2 and p1 == p3)
  30. {
  31.    PlayerHand = "5";
  32. }
  33. if(PlayerHand == "4" and z1 == z2 and z1 == z3)
  34. {
  35.    PlayerHand = "6";
  36. }
  37. if(eval("_level0/:fold") == "0")
  38. {
  39.    if(DealerHand == "0")
  40.    {
  41.       AnteLevel = "1";
  42.    }
  43.    WinnerLevel = PlayerHand;
  44.    if(PlayerHand < DealerHand)
  45.    {
  46.       AnteLevel = "0";
  47.    }
  48.    if(DealerHand < PlayerHand and DealerHand != "0")
  49.    {
  50.       AnteLevel = PlayerHand;
  51.       if(AnteLevel < "4" and AnteLevel != "1")
  52.       {
  53.          AnteLevel = "2";
  54.       }
  55.    }
  56.    if(DealerHand == PlayerHand and DealerHand != "0")
  57.    {
  58.       if(PlayerHand == "1" and p1 == "1" and d1 == "1")
  59.       {
  60.          if(d3 < p3)
  61.          {
  62.             AnteLevel = "2";
  63.          }
  64.          if(p3 < d3)
  65.          {
  66.             AnteLevel = "0";
  67.          }
  68.          if(p3 == d3)
  69.          {
  70.             if(d2 < p2)
  71.             {
  72.                AnteLevel = "2";
  73.             }
  74.             if(p2 < d2)
  75.             {
  76.                AnteLevel = "0";
  77.             }
  78.             if(d2 == p2)
  79.             {
  80.                AnteLevel = "20";
  81.             }
  82.          }
  83.       }
  84.       if(PlayerHand == "1" or PlayerHand == "3" and p1 != "1" and d1 != "1")
  85.       {
  86.          if(d3 < p3)
  87.          {
  88.             AnteLevel = "2";
  89.          }
  90.          if(p3 < d3)
  91.          {
  92.             AnteLevel = "0";
  93.          }
  94.          if(p3 == d3)
  95.          {
  96.             if(d2 < p2)
  97.             {
  98.                AnteLevel = "2";
  99.             }
  100.             if(p2 < d2)
  101.             {
  102.                AnteLevel = "0";
  103.             }
  104.             if(p2 == d2)
  105.             {
  106.                if(d1 < p1)
  107.                {
  108.                   AnteLevel = "2";
  109.                }
  110.                if(p1 < d1)
  111.                {
  112.                   AnteLevel = "0";
  113.                }
  114.                if(d1 == p1)
  115.                {
  116.                   AnteLevel = "20";
  117.                }
  118.             }
  119.          }
  120.       }
  121.       if(PlayerHand == "1" and p1 == "1" and d1 != "1")
  122.       {
  123.          AnteLevel = "2";
  124.       }
  125.       if(PlayerHand == "1" and d1 == "1" and p1 != "1")
  126.       {
  127.          AnteLevel = "0";
  128.       }
  129.       if(PlayerHand == "2")
  130.       {
  131.          if(dpair < ppair)
  132.          {
  133.             AnteLevel = "2";
  134.          }
  135.          if(ppair < dpair)
  136.          {
  137.             AnteLevel = "0";
  138.          }
  139.          if(ppair == "1" and dpair != "1")
  140.          {
  141.             AnteLevel = "2";
  142.          }
  143.          if(dpair == "1" and ppair != "1")
  144.          {
  145.             AnteLevel = "0";
  146.          }
  147.          if(ppair == dpair)
  148.          {
  149.             if(d3 < p3 or d1 < p1)
  150.             {
  151.                AnteLevel = "2";
  152.             }
  153.             if(p3 < d3 or p1 < d1)
  154.             {
  155.                AnteLevel = "0";
  156.             }
  157.             if(p1 == d1 and p2 == d2 and p3 == d3)
  158.             {
  159.                AnteLevel = "20";
  160.             }
  161.          }
  162.       }
  163.       if(PlayerHand == "4" or playerHand == "5" or playerHand == "6")
  164.       {
  165.          if(d3 < p3)
  166.          {
  167.             AnteLevel = PlayerHand;
  168.          }
  169.          if(p3 < d3)
  170.          {
  171.             AnteLevel = "0";
  172.          }
  173.          if(p3 == d3)
  174.          {
  175.             AnteLevel = "20";
  176.          }
  177.       }
  178.    }
  179.    if((AnteLevel == "0" or AnteLevel == "1") and PlayerHand >= "4")
  180.    {
  181.       if(AnteLevel == "1")
  182.       {
  183.          AnteLevel2 = "1";
  184.       }
  185.       AnteLevel = PlayerHand * "10";
  186.    }
  187. }
  188. if(eval("../:creditsPlayedan") == "0")
  189. {
  190.    WinnerLevel = PlayerHand;
  191.    AnteLevel = "3009";
  192. }
  193.